GT-6144 U.S.S. Enterprise Display Program ST-1 


The ST-1 program included in these instructions is the program-that was used 
in generating the display of the Enterprise as shown in some of our advertisements. 
Since the program is rather long it should be dumped to either cassette or paper 
tape as soon as it is entered. Note that the program is broken up-into several 
segments. Locations $$9% to 683 contains the necessary statements to configure 
a SWIPC MP-L interface for output and also contain the necessary programming for 
output coordinates from the computer's memory to the PIA. The program assumes 
that the MP-L interface is installed in the #3 slot - if another is used the PIA 
address stored in $994 and $095 should be changed. Locations 6A to #8C5 
contain a screen erase subroutine and $9C6 to POF5 tell the display part of the 
program where in memory the coordinates to be displayed are. 1% to $147 con- 
tains the same BLANKING/REVERSING program as used in the BARTST diagnostic. The 
poiat coordinates to be displayed are formatted as follows: 


6290 —> 9364 U.S.S. Enterprise 
6460 —> O4EF Planet Earth 
9508 —> 9534 Stars 


Note that the program does not automatically unblank the screen of the GT-6144 
or turn off the video from a CT-1024 - these functions must be done manually 
through switches or by typing the appropriate number on the terminal as in the 
BARTST, after the display has loaded. Also note there is a 10 second delay bet- 
ween the time the planet Earth appears and when the stars appear. This is normal 
and is part of a delay loop in the program. 
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gorr® 


6000 
C00] 
9602 
0903 
CO04 
OCG5 
CI06 
0007 
0008 
0009 
OOCA 
O0COB 
000C 
000d 
OOOE 
COOF 
0010 
0011 
0012 
CO13 
0014 
0615 
0016 


OO17 © 


OO1e 
OO19 
OOlA 
OC1B 
OO1C 
001D 
OOLE 
OO1F 
0620 
0021 

0022 
0083 
0024 
coes 
0026 
0027 
0026 
9029 
CoeA 
0028 
COEC 
o0e2D 
COLE 
ooeFr 
0030 
0031 

CO32 
0033 
0034 
0035 
0036 
0037 
0038 


OUTCH: 


OVR: 


PRINT: 


GT-6144 Enterprise Display Program ST-1 


START ADD 
PARADRMSB 
PARADRLSB 

LDX PARADRMSB 

STA AO,X 

LDA B- #837 

STAB 1,X 

LDA B- @,X 

LDA B #S3F 

STAB 1,X 

RTS 

LDA A #83C 


STA A #8007 


LDX PARADRMSB 
LDA B- #83F 
STAB @,X 


LDA B- #S3F 


STAB 1,X 
JSR ERASE 
JSR SHOW 
NOP 

NOP 

NOP 

NOP 

LDX START 
INX 

STX START 
LDX START 
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0039 
COSA 
003B 
003C 
COSh 
CO3E 
0O3F 
0040 
0041 
0042 
CO43 
0044 
0045 
0046 
0047 
0048 
OO4G 
OC4A 
OC4B 
OO4AC 
OO4AL 
CC4E 
OO4F 
0050 
elebom 
0c 52 
0053 
0054 
0055 
0C56 
0057 
0058 
0059 
OO5A 
0058 
OCSC 
GOS5D 
COSE 


OOSF I 


0060 
0061 
C062 
0063 
0064 
0065 
0066 
0067 
006& 
0069 
O06A 
O06B 
GOSC 
OC 6D 
OO6E 
CO6F 
0070 
0071 


DISPLAY: 


DELAY: 


JSR 


RTS 


LDA A 


0,x 


FF 


EXIT 


—DISPL 


OUTCH 


START 


START 


0,X 
SFE 
OVR 
DISP2 
OUuT2 
#540 
9941 
#S89 
9953 
DODO 


PRINT 


#SOO 


0072 
0073 
0074 
0075 


OC76 & 


0077 
0076 
C079 
OO7A 
007B 


OO7C - 


007D 
OO7E 
OO7F 
00S 0 
0081 
0082 
0083 


COA 
OOA1I 
ooAe 
COAS 
OCA4 
OOAS 
OOAS 
OOAT 
OOAE 
O0A9 
OOALA 
OOAB 
OOAC 
OOAD 
OOAE 
OOAF 
d0BO0 
OOB1 
00Be 
00B3 
OOB4 
OOB5 
O0OR6 
00B7 
OCBS 
00B9 
OOBA 
0OBB 
OOBC 


COBD & 


OOBE 
ORF 
00C0 
000 1 
00Ce2 
00C3 
O0C4 
00C5 


OV: 


INC: 


EXIT: 


ERASE: 


INCREM: 


SPEC: 


LDX 


#SDDO9 


#SFFFF 


INC 


OV 


EXIT 


OV 


OVER 
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0006 


OOC7 
COCs 
00C9 
OOCA 
OOCE 
OCCCE 
0OCD 
OCCE 
OOCF 
ooDO 
0oD1 


o0D2 . 


OOD3 
00D4 
0OD5 
OOD6 
COD7 
0ODS 
OObS 
OODA 
OODB 
oaDC 
OODD 
OODE 
OODF 
O0EO 
CCE! 
OOE2 
00E3 
O0E4 
OOES 
COE6 
OOE7 
COES 
O00E9 
OOEA 
OCEB 
OOEC 
OCED 
OOERE 
OOEF 
GOFO 
OOF 1 
00re 
OOFS3 
OOF4 
OOFS 


OUT: 


LDA A #800 


STA A HPOS 
STA A VPOS 
RTS 

NOP 

NOP 

NOP e 
LDA A #895 
LDA B #$9D 


DX #99200 


JSR DISPLAY 


LDA A #818 
LDA B #849 


LDX #8 $490 


JSR DISPLAY 
LDA B #SA 
ISR DELAY 
LDA A #800 
LDA BB #809 


LDX #5 9509 


JSR DISPLAY 


JSR OPTFN 


ia OX 


0100 ED OVER: JSR INEEE Se eas LDA A #$E5 

r ir vin Ih : 

eee 9195 20 BRA OUT 
2 21 v 

a ves carey “ea 01GB 56 SEVEN: LDA A  #$E6 

0105 27 BEQ ONE vist = 

0106 1E sree a BRA OUT 
4 3 at ie 

ae en ane C141 66 EIGHT: LDA A  #$E7 

0109 27 BEQ TWO Ose Eo 

bien 1e C143 ED our: JSR OUTCH 

O10B 81 CMP A #833 ore ee 

O10 33 eee , 

O10D 27 BEQ THREE 0146 20 BRA OVER 

Seer C147 Bg 

O10F 81 CMP A #834 

O110 34 

O111 27 BEQ FOUR 

O112 1E 

0113 31 CMPA #835 

0114°35 

0115 27_ BEQ FIVE 

OLIS EE 

0117 81 CMP A #$36 

0118 36 

O119 27 BEQ SIX 

OIA LE 

O11B 6&1 CMP A #$37 

OLIC 37° 

CLID 27 BEQ SEVEN 

GIIE.1E 

OLIF §& CMP A #$38 

0120 38 

0121 27 | BEQ EIGHT 

0122 15 

6123 80 BRA OVER 

0124 DB 

0125 86 ONE: LDAA  #SE 

0126 EO 

0127 20 BRA OUT 

0128 1A’ 

0129 86 TWO: LDA A #8E1L 

0124 El 

O12ZE 20 BRA OUT 

0120 16 


O12D 86 | THREE: LDA A #8E2 
Ol2E E 


O12F 20 BRA OUT 
0130 12 

0131 86 FOUR: LDA A #$E3 
0132 ES 

0133 20 BRA OUT 
0134 OF 

0135 86 FIVE: LDA A #SE4 
0136 E4 

0137 20 BRA OUT 


0138 OA 
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G200 
0eol 
cdeoe 
0203 
C204 
0205 


0206. 


0207 
C208 
0209 


G20 


020 
o20c 
*020D 
020kr 
OcOF 
0210 
o211 
Gele 
0213 
0214 
0215 
0216 
0217 
0218 
0219 
oela 
0215 
0216 
o21D 
Cele 
oeir 
0220 
0221 
0ee22 
0223 
0224 
0225 
0226 
0227 
0&2 
0229 
C22cA 
022Er 
C220 
O22eD 
0228 
022F 
0230 
0231 
0232 
0233 
0234 
0235 
0236 
0237 
0234 


6229 
023A 
023E 
023C 
023D 
023E 
623F 
C246 
9241 
0242 
0243 
C244 
C245 
0246 
C247 
C246 
D249 
Ce4a 
O24E 
CeAC 
O24D 
024E 
O24F 
0250 
0251 

0252 
0253 
0254 
0255 
0256 
0257 
0258 
0259 

0258 
0255 
025C 

025D 
0e5E 
025F 
C260 

6261 

0262 

0263 

0264 

0265 

0266 

0267 


0268 


6259 
C264 
6265 
026C 
026D 
C26E 
026Fr 
0270 
0271 


0272 OC 
0273 11 
0274 15 
6275 1D 
0276 FE 
1277 16 
027E O¢ 
C279 OC 
C274 12 
027B 14 
ce7C 19 
C27bD 1E 
027 FE 
O27F 17 
S260 OS 


Om 


— 
1) 
QO 


t 


212 


MOoOOO COO OO 6 
fh A) M 0 WM 2M 
MOAAIAM AWM A 


OANA Ub WN 
— 
ca 


C264 19 
0265 IF 
028C FE 
C26D 19 
O28E 09 
O28F O04 
6296 OB 
0291 OD 
0292 13 
C293 19 
0294 IF 
0295 FE 
0296 1A 
0297 O05 
0298 OF 
0299 13 
0294 IF 
0295 FE 
ce9c IB 
029D 063 
O2L9E 04 
029F 06 
o240 07 
O2A1 Ll 
O2h2 14 
0283 19 
0244 IF 
O2A5 FE 
0286 IC 
Of47 Of 
OZAS 08 
0289 13 
C2AA 14 
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O245 
G2AC 
0240 
C2AE 
C2AF 
0280 
0eb1 
ene 
OLEB3 
02B4 
06685 
0256 
0237 
0285 
028 
O2BA 
C25E 
02EC 
C2BD 
C2BE 
0enF 
02C0 
0ecl 
C2ce 
0203 
02C4 
025 
0206 
02C7 
6205 
02C9 
02C4 
02CR 
o2cc 
02cD 
O2CE 
O2CF 
O2D0 
oeb1i 
CeDe 
O02D3 
0e2DbA 
02eD5 
02D6 
O02D7 
02DS 
OED9 
O2DA 
02DE 
0abC 
02DD 
02DE 
O02DF 
O2E0 
02E1 
02Ee 
02E3 


oO 
Oo ny 


GN we Osj fe 


Ho 


za 
3 


MOSBOdOOO090 9D 0 C0NO0 


POW WWW WwW 0 0 to Ww OD 
TM A MT PY — PT A ee me 
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Oo © -~J 


0344 
0345 
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C349 
OS4A 
OS4E 
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O34D 
OS4E 


OO © 
1 ON 
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C439 
DASA 
OASE 
043C 
O43D 


O43E | 


OASF 
0440 
O44 1 
0442 
C443 


O444 


0445 
D446 
O4AT 
C448 
C249 
OAAA 
O445 
0446 
O44D 
O4AF 
O44 F 
0450 
0451 
0452 
0453 
OA54 
OASS5 
0456 
0457 
0458 
0459 
0454 
045B 
O45C 
O45D 
CASE 
O45F 
0460 
0461 
0462 
0463 
O4A64 
0465 
0466 
0467 
046% 
G469 
C468 
04638 
O46C 
046D 
OAGE 
O46F 
C470 
0471 


0472 
C473 
OA7T4 
0475 
0476 
047-7 
0478 
0479 
OA78 
04728 
OA7C 
047D 
OAT E 
CATE 
0480 
0461 
0462 
C483 
OABA 
C485 
0486 
0487 
0488 
0489 
OAS A 
048B 
O4EC 
048 D 
O48E 
O48 F 
O4A90 § 
049 1 
0492. 
0493 
OAD dy 
C495 
0496 
0497 
0496 
0499 
OAGA 
0495 
C49C 
O49 D 
O49F 
CAOF 
D440 
CAA1 
0482 
O443 
O4A4 
O4A5 
O4A6 
0447 
04486 
O4A9 
O4AA 


OAAB 
C4AC 
04 AD 
O4AE 
O4AF 
C4E0 
C4B1 
O4ABEe 
0483 
C454 
0465 
O4BE6 
OAB7 
CABS 
CALS 
O4ABA 
O4EB 
0460 
O42:D 
OABE 
O48F 
C4C0 
0401 
0402 
0463 
0404 
0405 
0406 
0407 
0408 
0469 
0404 
O4¢65 
040C 


OADD 
CADE 
OLDF 
B4E0 
C4El 
04E2 


CAES 


HO oP or 
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HOBO ty 


20 
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